(defun $module-$card_uc ()
  (interactive)
  (let ((flag '($card_flags_elist)))
    (insert "$card " (ido-completing-read "Select the flag: " flag)))
    (newline 1))
